home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / latex209 / contrib / address / letter.tex < prev    next >
Text File  |  1993-11-28  |  3KB  |  113 lines
  1. %%% ============================================================
  2. %%%  @LaTeX-style-file{
  3. %%%    author            = "Michael Wester",
  4. %%%    version           = "1.0",
  5. %%%    date              = "July 1991",
  6. %%%    time              = "NULL",
  7. %%%    filename          = "address.tex",
  8. %%%    address           = "Math & Stat Dept.
  9. %%%                         University of New Mexico
  10. %%%                         Albuquerque, NM 87131",
  11. %%%    telephone         = "NA",
  12. %%%    FAX               = "NA",
  13. %%%    checksum          = "NA",
  14. %%%    email             = "wester@spectre.unm.edu (Internet)",
  15. %%%    codetable         = "ISO/ASCII",
  16. %%%
  17. %%%    keywords          = "LaTeX, TeX, formletter, mailing labels",
  18. %%%    supported         = "yes",
  19. %%%
  20. %%%    docstring         = "TeX/LaTeX test letter file for
  21. %%%                         address.tex",
  22. %%% }
  23. %%% ====================================================================
  24. \print{Naddr=\the\Naddr.}
  25. \print{Laddr=\the\Laddr.}
  26. %
  27. \print{Name=\Name.}
  28. \ifx\SocialTitle\empty
  29. \else
  30.    \print{SocialTitle=\SocialTitle.}
  31. \fi
  32. \ifx\FirstName\empty
  33. \else
  34.    \print{FirstName=\FirstName.}
  35. \fi
  36. \ifx\MiddleName\empty
  37. \else
  38.    \print{MiddleName=\MiddleName.}
  39. \fi
  40. \ifx\LastName\empty
  41. \else
  42.    \print{LastName=\LastName.}
  43. \fi
  44. \ifx\Suffix\empty
  45. \else
  46.    \print{Suffix=\Suffix.}
  47. \fi
  48. \ifx\OtherTitle\empty
  49. \else
  50.    \print{OtherTitle=\OtherTitle.}
  51. \fi
  52. %
  53. \ifx\Address\empty
  54. \else
  55.    {\toks0=\expandafter{\Address}
  56.     \print{Address=\the\toks0.}}
  57. \fi
  58. %
  59. {\setbox0=\hbox{\AddrLine1}}
  60. \ifx\Current\empty
  61. \else
  62.    \print{AddrLine1=\Current.}
  63. \fi
  64. {\setbox0=\hbox{\AddrLine2}}
  65. \ifx\Current\empty
  66. \else
  67.    \print{AddrLine2=\Current.}
  68. \fi
  69. {\setbox0=\hbox{\AddrLine3}}
  70. \ifx\Current\empty
  71. \else
  72.    \print{AddrLine3=\Current.}
  73. \fi
  74. %
  75. {\setbox0=\hbox{\AddrBlock1}}
  76. \ifx\Current\empty
  77. \else
  78.    {\toks0=\expandafter{\Current}
  79.     \print{AddrBlock1=\the\toks0.}}
  80. \fi
  81. {\setbox0=\hbox{\AddrBlock2}}
  82. \ifx\Current\empty
  83. \else
  84.    {\toks0=\expandafter{\Current}
  85.     \print{AddrBlock2=\the\toks0.}}
  86. \fi
  87. {\setbox0=\hbox{\AddrBlock3}}
  88. \ifx\Current\empty
  89. \else
  90.    {\toks0=\expandafter{\Current}
  91.     \print{AddrBlock3=\the\toks0.}}
  92. \fi
  93. %
  94. \StoreAddrBlock1\in\Block
  95. {\setbox0=\hbox{\GetLine1\of\Block}}
  96. \ifx\Current\empty
  97. \else
  98.    {\toks0=\expandafter{\Current}
  99.     \print{GetLine1 of AddrBlock1=\the\toks0.}}
  100. \fi
  101. {\setbox0=\hbox{\GetLine2\of\Block}}
  102. \ifx\Current\empty
  103. \else
  104.    {\toks0=\expandafter{\Current}
  105.     \print{GetLine2 of AddrBlock1=\the\toks0.}}
  106. \fi
  107. {\setbox0=\hbox{\GetLine3\of\Block}}
  108. \ifx\Current\empty
  109. \else
  110.    {\toks0=\expandafter{\Current}
  111.     \print{GetLine3 of AddrBlock1=\the\toks0.}}
  112. \fi
  113.